home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 016a / partnr52.zip / SERVER.BAT < prev   
DOS Batch File  |  1991-09-15  |  2KB  |  66 lines
  1. echo off
  2. cls
  3. rem
  4. rem                       EQUAL PARTNERS
  5. rem
  6. rem                        Version 5.20
  7. rem   Copyright (c) DOWNLINK SYSTEMS  1986,1987,1988,1989,1990,1991
  8. rem
  9. rem This is an example of installing PARTNERS on the "server"
  10. rem also the .bat checks the error/return code from the
  11. rem application program, and takes action accordingly.
  12. rem
  13. rem The %1 symbolic parameter MUST be either  C  or  L  (Com/Lpt)
  14. rem
  15. rem The %2 MUST be either  1  or  2  (Com1/Com2 or Lpt1/Lpt2)
  16. rem
  17. rem The %3 may be any other parameter
  18. rem
  19. PARTNERS.COM /%1/%2/%3
  20.  
  21. if errorlevel 7 goto exithelp
  22. if errorlevel 6 goto okremote
  23. if errorlevel 5 goto okesc
  24. if errorlevel 4 goto already
  25. if errorlevel 3 goto allocating
  26. if errorlevel 2 goto shrinking
  27. if errorlevel 1 goto badcomm
  28. echo  
  29. echo PARTNERS successfully installed (non-resident)
  30. goto end
  31.  
  32. :okremote
  33. echo  
  34. echo PARTNERS returning to DOS because REMOTE requested shutdown!
  35. goto end
  36.  
  37. :okesc
  38. echo  
  39. echo PARTNERS returning to DOS because 'ESC' key pressed!
  40. goto end
  41.  
  42. :already
  43. echo  
  44. echo PARTNERS terminated because EQUAL is running on this PC
  45. goto end
  46.  
  47. :shrinking
  48. echo  
  49. echo PARTNERS terminated because of an error freeing DOS memory
  50. goto end
  51.  
  52. :allocating
  53. echo  
  54. echo PARTNERS terminated because there is not enough required memory (64k)
  55. goto end
  56.  
  57. :badcomm
  58. echo  
  59. echo Communications device and port was not found or not specified
  60. goto end
  61.  
  62. :end
  63. rem echo  
  64. rem echo ** END OF PARTNERS INSTALL **
  65. :exithelp
  66.